home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / The World of Computer Software.iso / ply15dat.zip / SHEAR1.PI < prev    next >
Text File  |  1992-09-19  |  700b  |  32 lines
  1. // Generic Polyray input File
  2. // Polyray input file: Alexander Enzmann
  3.  
  4. // Set up the camera
  5. viewpoint {
  6.    from <0, 5, -5>
  7.    at   <0, 0,  0>
  8.    up   <0, 1,  0>
  9.    angle 30
  10.    resolution 160, 160
  11.    }
  12.  
  13. // Get various surface finishes
  14. include "..\colors.inc"
  15.  
  16. // Set up background color & lights
  17. background black
  18. light <10, 10, -20>
  19.  
  20. // Torus - basic doughnut shape.  The distance from the origin to the center
  21. // of the ring is "r0", the distance from the center of the ring to the surface
  22. // is "r1".
  23. define r0 0.5
  24. define r1 0.2
  25. object {
  26.    torus r0, r1, <0, 0, 0>, <0, 0, 1>
  27.    root_solver Ferrari
  28.    shiny_red
  29.    rotate <70, 20, 0>
  30.    shear 0.7, 0, 0, 0, 0, 0
  31.    }
  32.